home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 45
/
Aminet 45 (2001)(GTI - Schatztruhe)[!][Oct 2001].iso
/
Aminet
/
game
/
role
/
ldmud-3.2-bin.lha
/
mud
/
StartMUD
< prev
next >
Wrap
AmigaDOS Script File
|
2001-08-08
|
1KB
|
69 lines
.key OPT/F
;*************************************
;* *
;* StartMUD - ldmud startup script *
;* (C)2001 Niels Böhm *
;* *
;* change whatever you like :) *
;* *
;*************************************
FailAt 21
Version >NIL: bsdsocket.library
IF FAIL
Version >NIL: socket.library
IF FAIL
Echo Please start your TCP/IP stack first!
Quit 20
ENDIF
IF EXISTS LIBS:socket.library
Echo Please start your TCP/IP stack first!
Quit 20
ENDIF
ENDIF
Assign >NIL: mud: EXISTS
IF WARN
Set §ldmud§mud§remove 1
Assign mud: ""
ENDIF
Assign >NIL: tmp: EXISTS
IF WARN
Set §ldmud§tmp§remove 1
IF EXISTS mud:tmp
Assign tmp: mud:tmp
ELSE
IF EXISTS SYS:t
Assign tmp: SYS:t
ELSE
Assign tmp: T:
ENDIF
ENDIF
ENDIF
Delete >NIL: tmp:LP_SWAP.3#? QUIET FORCE
Set §ldmud§opt ""
IF NOT EXISTS mud:lib
IF EXISTS mud:mudlib/test_master.c
Set §ldmud§opt -m /mud/mudlib -M /test_master
ENDIF
ENDIF
mud:bin/driver $§ldmud§opt <OPT>
Unset §ldmud§opt
Delete >NIL: tmp:LP_SWAP.3#? QUIET FORCE
IF $§ldmud§tmp§remove EQ 1
Assign tmp:
Unset §ldmud§tmp§remove
ENDIF
IF $§ldmud§mud§remove EQ 1
Assign mud:
Unset §ldmud§mud§remove
ENDIF